home *** CD-ROM | disk | FTP | other *** search
/ Workplace Effectiveness:…ecision-Making Strategies / Workplace Effectiveness: Decision-Making Strategies.iso / pc / Files / Reach4.dxr / 00001_Startup.ls next >
Encoding:
Text File  |  1998-12-16  |  558 b   |  22 lines
  1. global gMasterData
  2.  
  3. on prepareMovie
  4.   setUserArea(gMasterData, #reach4)
  5.   initFields()
  6.   set the keyDownScript to "quitCatcher"
  7.   cursor(0)
  8. end
  9.  
  10. on stopMovie
  11. end
  12.  
  13. on initFields
  14.   set vEmptyList to ["brain Field 1", "brain Field 2", "brain Field 3", "brain Field 4", "brain Field 5", "brain Field 6", "brain Field 7", "brain Field 8", "brain Field 9"]
  15.   repeat with X in vEmptyList
  16.     set the text of member X to " "
  17.     set the textFont of member X to "Palatino"
  18.     set the textSize of member X to 14
  19.     set the text of member X to EMPTY
  20.   end repeat
  21. end
  22.